home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 016a / skipper1.zip / SAMPLE.MOD < prev    next >
Text File  |  1990-08-01  |  4KB  |  241 lines
  1. ECHO OFF
  2. IF %1!==! GOTO ERR
  3.  
  4. GOTO %1!
  5.  
  6. :******** SAMPLE AUTOEXEC.BAT file ********
  7. ECHO OFF
  8. C:\DOS\MODE LPT1:80,6,P
  9. C:\DOS\MODE LPT1
  10. C:\DOS\PRINT /D:LPT1
  11. rem Install TSR programs here
  12.  
  13.  
  14. CD \SKIPPER
  15. COPY SKIPPER.COM D:
  16. COPY SKIPPER.OVL D:
  17. CD \
  18. COPY SKR.BAT D:
  19. C:\SKIPPER\INITSKR
  20. PATH C:\DOS;C:\TOOLBOX
  21. D:\SKR
  22. :******** END OF AUTOEXEC.BAT FILE ********
  23.  
  24. :*************** PATH MODULES *************
  25. :AA!     GENERIC PATH MODULE TO ACCESS PROGRAMS ON A DISKETTE
  26. :PIF
  27. GOTO ERRM
  28. A:\
  29. :AA!
  30.  
  31. :BP!     RUN BASIC PROGRAMS FROM BPROGS DIRECTORY
  32. :PIF
  33. GO TO ERRM
  34. C\BPROGS
  35. :BP!
  36.  
  37. :GM!     PLAY GAMES FROM GAMES DIRECTORY
  38. :PIF
  39. GOTO ERRM
  40. C:\GAMES
  41. :GM!
  42.  
  43. ********* APPLICATION PIF MODULES ************
  44.  
  45. :ED!     PROFESSIONAL EDITOR
  46. :PIF
  47. GOTO ERRM
  48. C:\DOS
  49. EDIT.EXE
  50. :ED!
  51.  
  52. :EL!     EDLIN
  53. :PIF
  54. GOTO ERRM
  55. C:\DOS
  56. EDLIN.COM
  57. :ASK FSPEC
  58. :EL!
  59.  
  60. :MU!     RUN BASIC PROGRAM MUSIC
  61. :PIF
  62. GOTO ERRM
  63. C:\BGAMES
  64. C:\DOS\BASICA.COM
  65. MUSIC.BAS
  66. :MU!
  67.  
  68. ************ STANDARD BATCH MODULES ****************
  69.  
  70. :BA!     WRITE BASIC PROGRAMS TO DIRECTORY BPROGS
  71. ECHO OFF
  72. ECHO Please enter the command SYSTEM when done
  73. C:
  74. CD \BPROGS
  75. BASICA
  76. GOTO END
  77. :BA!
  78.  
  79. :DB!     ACCESS MULTIPLE DATABASES
  80. ECHO OFF
  81. C:
  82. CD \DBASE
  83. DBASE MENUDRVR
  84. CD \
  85. GOTO END
  86. :DB!
  87.  
  88. :WD!
  89. ECHO OFF
  90. C:
  91. CD \WORD
  92. WORD A:\MYFILE.RPT
  93. CD \
  94. GOTO END
  95. :WD!
  96.  
  97. :WO!
  98. :ASK FSPEC
  99. ECHO OFF
  100. IF %2!==! GOTO ERR
  101. C:
  102. CD \WORD
  103. WORD %2
  104. CD \
  105. GOTO END
  106. :WO!
  107.  
  108. *********** DATA BASE AND SPREADSHEET APPLICATIONS *********
  109.  
  110. :DS!     dBASE III SAMPLE DATABASE
  111. ECHO OFF
  112. SUBST E: C:\SAMPLES
  113. C:
  114. CD C:\DBASE
  115. DBASE ACC
  116. SUBST E: /D
  117. CD \
  118. GOTO END
  119. :DS!
  120.  
  121. ************ RECYCLING APPLICATIONS ******************
  122.  
  123. :MA!     MACRO ASSEMBLER
  124. :ASK Drive Path
  125. ECHO OFF
  126. IF %2!==! GOTO REPEAT
  127. IF %2==: GOTO REPEAT
  128.  
  129. %2
  130. CD %3
  131.  
  132. :REPEAT
  133.  
  134. BREAK ON
  135. MASM
  136. BREAK OFF
  137.  
  138. RECYCLE
  139. IF ERRORLEVEL 1 GOTO REPEAT
  140. GOTO END
  141. :MA!
  142.  
  143. *********** COMPLEX BATCH MODULES **************
  144.  
  145. :BD!      DAYLY BACKUP OF A DIRECTORY AND ITS SUBDIRECTORIES
  146. ECHO OFF
  147. ECHO Starting BACKUP of TOPPROJ
  148.  
  149. BACKUP C:\TOPPROJ\*.* A:/S/M
  150.  
  151. IF ERRORLEVEL 4 GOTO BKERR4
  152. IF ERRORLEVEL 3 GOTO BKERR3
  153. IF ERRORLEVEL 2 GOTO BKERR2
  154. IF ERRORLEVEL 1 GOTO BKERR1
  155.  
  156. :DONE
  157. ECHO BACKUP of TOPPROJ complete
  158. GOTO ENDBD
  159.  
  160. :BKERR4
  161. ECHO BACKUP terminated due to error
  162. GOTO ENDBD
  163.  
  164. :BKERR3
  165. ECHO BACKUP terminated by user
  166. GOTO ENDBD
  167.  
  168. :BKERR2
  169. ECHO BACKUP incomplete. Some files not
  170. ECHO backed up due to sharing
  171. GOTO ENDBD
  172.  
  173. :BKERR1
  174. ECHO No files found for backup
  175.  
  176. :ENDBD
  177. PAUSE
  178. GOTO END
  179. :BD!
  180.  
  181. :DC!     COMPARE FILES FROM 2 DIRECTORIES
  182. :ASK SOURCE_SPECS TARGET_SPECS
  183. DIRCOMP %2 %3  > D:\COMPARE.TMP
  184. BROWSE D:\COMPARE.TMP
  185. GOTO END
  186. :DC!
  187.  
  188. :M1!     RESET LINE PRINTER
  189. :ASK LPT# CHAR(80,132) LINES(6,8)
  190. ECHO OFF
  191. IF %2!==!' GOTO ERR
  192. MODE LPT%2: %3,%4,%5
  193. GOTO END
  194. :M1!
  195.  
  196. :M2!     SWITCH DISPLAYS
  197. :ASK (CO40 CO80 MONO)
  198. ECHO OFF
  199. IF %2!==! GOTO ERR
  200. MODE %2,%3,%4
  201. GOTO END
  202. :M2!
  203.  
  204. :M3!     INITIALIZE ASYNC COMMINUCATIONS ADAPTER
  205. :ASK COM# BAUD PARITY DATABITS STOPBITS
  206. ECHO OFF
  207. IF %2!==! GOTO ERR
  208. MODE COM%2:%3,%4,%5,%6,%7
  209. GOTO END
  210. :M3!
  211.  
  212. :M4!     REDIRECT LPT TO COMM
  213. :ASK LPT# COM# Baud
  214. ECHO OFF
  215. IF %4!==! GOTO ERR
  216. MODE COM%3:%4,%5,%6,%7,%8
  217. MODE LPT%2=COM%3
  218. GOTO END
  219. :M4!
  220.  
  221. :SP!     SETUP PRINT CONTROLLER FOR SKIPPER
  222. :ASK FSPECS FOR SCRIPT FILE FOR DEBUG
  223. ECHO OFF
  224. IF %2!==! GOTO ERR
  225. C:
  226. CD \SKIPPER
  227. DEBUG < %2
  228. COPY HELPDS.HLP/B + PRINT.HLP DOSSKR.HLP/B
  229. CD \
  230. GOTO END
  231. :SP!
  232.  
  233. :ERR
  234. ECHO Missing Parms
  235. GOTO END
  236.  
  237. :ERRM
  238. ECHO %1 is a PIF module
  239.  
  240. :END
  241.